Dit voorbeeld maakt gebruik van de functie TimeSerial om een tijdwaarde voor een opgegeven uur, minuut en seconde te geven.
Dim MyTime MyTime = TimeSerial(16, 35, 17) ' MyTime bevat seriδle ' weergave van 4:35:17 PM.